home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / Packages.mod < prev    next >
Encoding:
Text File  |  1995-08-07  |  1.3 KB  |  54 lines  |  [TEXT/MPS ]

  1. (*
  2.      File:        Packages.mod
  3.  
  4.      Contains:    Package Manager Interfaces.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE Packages;
  23.  
  24. IMPORT SYSTEM;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29.  
  30. CONST
  31.     listMgr*                        = 0;                            (* list manager *)
  32.     dskInit*                        = 2;                            (* Disk Initializaton *)
  33.     stdFile*                        = 3;                            (* Standard File *)
  34.     flPoint*                        = 4;                            (* Floating-Types.Point Arithmetic *)
  35.     trFunc*                        = 5;                            (* Transcendental Functions *)
  36.     intUtil*                        = 6;                            (* International Utilities *)
  37.     bdConv*                        = 7;                            (* Binary/Decimal Conversion *)
  38.     editionMgr*                    = 11;                            (* Edition Manager *)
  39.  
  40.  
  41. PROCEDURE InitPack*(packID: INTEGER);
  42.     (*$IF NOT GENERATINGCFM*)
  43.     INLINE PASCAL $A9E5;
  44.     (*$END*)
  45. PROCEDURE InitAllPacks*;
  46.     (*$IF NOT GENERATINGCFM*)
  47.     INLINE PASCAL $A9E6;
  48.     (*$END*)
  49.  
  50. (* $ALIGN RESET*)
  51. (* $POP*)
  52.  
  53.  END Packages.
  54.